home *** CD-ROM | disk | FTP | other *** search
/ Shareware Extravaganza - Disc 4 / Shareware Extravaganza - Over 25,000 Programs (The Ultimate Shareware Company)(Disc 4 of 4)(1993).iso / cad / autohtch.zip / HATCH.MNU < prev    next >
Text File  |  1990-05-08  |  3KB  |  58 lines
  1.  
  2. **hatch1
  3. [Select Hatch Pattern]
  4. [ Previous/User]^c^c^p(if (not C:htch)(load "htch"));htch
  5. [acad(ansi31)]^c^c^p(setq pat "ansi31") (if (not C:htch)(load "htch"));htch
  6. [acad(ansi32)]^c^c^p(setq pat "ansi32") (if (not C:htch)(load "htch"));htch
  7. [acad(ansi34)]^c^c^p(setq pat "ansi34") (if (not C:htch)(load "htch"));htch
  8. [acad(ansi35)]^c^c^p(setq pat "ansi35") (if (not C:htch)(load "htch"));htch
  9. [acad(ansi33)]^c^c^p(setq pat "ansi33") (if (not C:htch)(load "htch"));htch
  10. [acad(ansi36)]^c^c^p(setq pat "ansi36") (if (not C:htch)(load "htch"));htch
  11. [acad(ansi37)]^c^c^p(setq pat "ansi37") (if (not C:htch)(load "htch"));htch
  12. [acad(ansi38)]^c^c^p(setq pat "ansi38") (if (not C:htch)(load "htch"));htch
  13. [acad(box)]^c^c^p(setq pat "box") (if (not C:htch)(load "htch"));htch
  14. [acad(brass)]^c^c^p(setq pat "brass") (if (not C:htch)(load "htch"));htch
  15. [acad(brick)]^c^c^p(setq pat "brick") (if (not C:htch)(load "htch"));htch
  16. [acad(clay)]^c^c^p(setq pat "clay") (if (not C:htch)(load "htch"));htch
  17. [acad(cork)]^c^c^p(setq pat "cork") (if (not C:htch)(load "htch"));htch
  18. [ Next]$i=hatch2 $i=*
  19. [ Exit]^c^c
  20.  
  21. **hatch2
  22. [Select Hatch Pattern]
  23. [acad(cross)]^c^c^p(setq pat "cross") (if (not C:htch)(load "htch"));htch
  24. [acad(dash)]^c^c^p(setq pat "dash") (if (not C:htch)(load "htch"));htch
  25. [acad(dolmit)]^c^c^p(setq pat "dolmit") (if (not C:htch)(load "htch"));htch
  26. [acad(dots)]^c^c^p(setq pat "dots") (if (not C:htch)(load "htch"));htch
  27. [acad(earth)]^c^c^p(setq pat "earth") (if (not C:htch)(load "htch"));htch
  28. [acad(escher)]^c^c^p(setq pat "escher") (if (not C:htch)(load "htch"));htch
  29. [acad(flex)]^c^c^p(setq pat "flex") (if (not C:htch)(load "htch"));htch
  30. [acad(grass)]^c^c^p(setq pat "grass") (if (not C:htch)(load "htch"));htch
  31. [acad(grate)]^c^c^p(setq pat "grate") (if (not C:htch)(load "htch"));htch
  32. [acad(hex)]^c^c^p(setq pat "hex") (if (not C:htch)(load "htch"));htch
  33. [acad(honey)]^c^c^p(setq pat "honey") (if (not C:htch)(load "htch"));htch
  34. [acad(hound)]^c^c^p(setq pat "hound") (if (not C:htch)(load "htch"));htch
  35. [acad(insul)]^c^c^p(setq pat "insul") (if (not C:htch)(load "htch"));htch
  36. [acad(line)]^c^c^p(setq pat "line") (if (not C:htch)(load "htch"));htch
  37. [ Next]$i=hatch3 $i=*
  38. [ Exit]^c^c
  39.  
  40. **hatch3
  41. [Select Hatch Pattern]
  42. [acad(mudst)]^c^c^p(setq pat "mudst") (if (not C:htch)(load "htch"));htch
  43. [acad(net)]^c^c^p(setq pat "net") (if (not C:htch)(load "htch"));htch
  44. [acad(net3)]^c^c^p(setq pat "net3") (if (not C:htch)(load "htch"));htch
  45. [acad(plast)]^c^c^p(setq pat "plast") (if (not C:htch)(load "htch"));htch
  46. [acad(plasti)]^c^c^p(setq pat "plasti") (if (not C:htch)(load "htch"));htch
  47. [acad(sacncr)]^c^c^p(setq pat "sacncr") (if (not C:htch)(load "htch"));htch
  48. [acad(square)]^c^c^p(setq pat "square") (if (not C:htch)(load "htch"));htch
  49. [acad(stars)]^c^c^p(setq pat "stars") (if (not C:htch)(load "htch"));htch
  50. [acad(steel)]^c^c^p(setq pat "steel") (if (not C:htch)(load "htch"));htch
  51. [acad(swamp)]^c^c^p(setq pat "swamp") (if (not C:htch)(load "htch"));htch
  52. [acad(trans)]^c^c^p(setq pat "trans") (if (not C:htch)(load "htch"));htch
  53. [acad(triang)]^c^c^p(setq pat "triang") (if (not C:htch)(load "htch"));htch
  54. [acad(zigzag)]^c^c^p(setq pat "zigzag") (if (not C:htch)(load "htch"));htch
  55. [acad(angle)]^c^c^p(setq pat "angle") (if (not C:htch)(load "htch"));htch
  56. [ Beginning]$i=hatch1 $i=*
  57. [ Exit]^c^c
  58.